﻿
Partial Class Public_QVbook
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            Dim sql As New MyStringBuilder
            Dim dat As New clsData
            Dim dt As Data.DataTable
            sql.AppendFormat(" Select  Active From Volunteer Where 1=1 ")
            sql.AppendFormat(" And VolunteerID='{0}' ", "F200184616 ")
            dt = dat.GetData(sql)
            lblCount.Text = dt.Rows(0)("Active").ToString()
        End If
    End Sub
End Class
